G:\Shared drives\MRDC Documents\Website\MRDCL Videos\mrdcl_files\PRE-105\run.stp
start data,
serial number in columns 1-4,
ds $gender=$4/1,2,
x='Male;
Female',
xt='Gender',
ds $age=$5/1,2,3,
x='16-34;
35-54;
55+',
xt='Age group',
dm $sec1_q1=$6-10,e,
x='Brand A;
Brand B;
Brand C;
Brand D;
Brand E;
None of these',
xt='Q1 Brands bought',
dm $sec1_q2=$11-15,e,
x=$sec1_q1,
xt='Q2 Brands seen advertised',
ds $sec2_q1_1=$51/1-5,e,
x='Very good (5)<v5>;
Quite good (4)<v4>;
Neither good nor poor (3)<v3>;
Quite poor (2)<v2>;
Very poor (1)<v1>;
Not sure',
xt='Section 2 Q1 Rating of Company X - Quality of service',
ds $sec2_q1_2=$52/1-5,e,
x='Very good (5)<v5>;
Quite good (4)<v4>;
Neither good nor poor (3)<v3>;
Quite poor (2)<v2>;
Very poor (1)<v1>;
Not sure',
xt='Section 2 Q1 Rating of Company X - Reliability',
ds $sec2_q1_3=$53/1-5,e,
x='Very good (5)<v5>;
Quite good (4)<v4>;
Neither good nor poor (3)<v3>;
Quite poor (2)<v2>;
Very poor (1)<v1>;
Not sure',
xt='Section 2 Q1 Rating of Company X - Prices',
ds $sec2_q1_4=$54/1-5,e,
x='Very good (5)<v5>;
Quite good (4)<v4>;
Neither good nor poor (3)<v3>;
Quite poor (2)<v2>;
Very poor (1)<v1>;
Not sure',
xt='Section 2 Q1 Rating of Company X - Staff',
ds $sec2_q1_5=$55/1-5,e,
x='Very good (5)<v5>;
Quite good (4)<v4>;
Neither good nor poor (3)<v3>;
Quite poor (2)<v2>;
Very poor (1)<v1>;
Not sure',
xt='Section 2 Q1 Rating of Company X - Payment options',
ds $sec2_q1_6=$56/1-5,e,
x='Very good (5)<v5>;
Quite good (4)<v4>;
Neither good nor poor (3)<v3>;
Quite poor (2)<v2>;
Very poor (1)<v1>;
Not sure',
xt='Section 2 Q1 Rating of Company X - Other products',
ds $sec2_q2_1=$61/1-5,e,
x='Agree strongly (2)<v2>;
Agree slightly (1)<v1>;
Neither nor disagree (0)<v0>;
Disagree slightly (-1)<v-1>;
Disagree strongly (-2)<v-2>;
Not sure',
xt='Section 2 Q2 Agreement with statements about Company X - Always provide good quality',
ds $sec2_q2_2=$62/1-5,e,
x='Agree strongly (2)<v2>;
Agree slightly (1)<v1>;
Neither nor disagree (0)<v0>;
Disagree slightly (-1)<v-1>;
Disagree strongly (-2)<v-2>;
Not sure',
xt='Section 2 Q2 Agreement with statements about Company X - Never late with deliveries',
ds $sec2_q2_3=$63/1-5,e,
x='Agree strongly (2)<v2>;
Agree slightly (1)<v1>;
Neither nor disagree (0)<v0>;
Disagree slightly (-1)<v-1>;
Disagree strongly (-2)<v-2>;
Not sure',
xt='Section 2 Q2 Agreement with statements about Company X - Manager is approachable',
ds $sec2_q2_4=$64/1-5,e,
x='Agree strongly (2)<v2>;
Agree slightly (1)<v1>;
Neither nor disagree (0)<v0>;
Disagree slightly (-1)<v-1>;
Disagree strongly (-2)<v-2>;
Not sure',
xt='Section 2 Q2 Agreement with statements about Company X - Good experience',
finish data,
start tables,
dm $banner=$gender,$age,
x='Gender\' + $gender + 'Age\' + $age,
select banner $banner,
t#1=$gender *,
t#2=$age *,
t#3=$sec1_q1 *,
t#4=$sec1_q2 *,
t#5=$sec2_q1_1 *,
t#6=$sec2_q1_2 *,
t#7=$sec2_q1_3 *,
t#8=$sec2_q1_4 *,
t#9=$sec2_q1_5 *,
t#10=$sec2_q1_6 *,
t#11=$sec2_q2_1 *,
t#12=$sec2_q2_2 *,
t#13=$sec2_q2_3 *,
t#14=$sec2_q2_4 *,
!1=Root variable name
!2=No of statements
!3=Data statement containing texts
!4=Banner
!5=1-Top 2 Box, 0-No top 2 box
!6=1-Summary table 0-No summary table
!7=Summary table title
dm $v_sec2_q1_1=$sec2_q1_1/1..2,$sec2_q1_1,
x='Top 2 box' + $sec2_q1_1,
xt=$sec2_q1_1,
dm $v_sec2_q1_2=$sec2_q1_2/1..2,$sec2_q1_2,
x='Top 2 box' + $sec2_q1_2,
xt=$sec2_q1_2,
dm $v_sec2_q1_3=$sec2_q1_3/1..2,$sec2_q1_3,
x='Top 2 box' + $sec2_q1_3,
xt=$sec2_q1_3,
dm $v_sec2_q1_4=$sec2_q1_4/1..2,$sec2_q1_4,
x='Top 2 box' + $sec2_q1_4,
xt=$sec2_q1_4,
dm $v_sec2_q1_5=$sec2_q1_5/1..2,$sec2_q1_5,
x='Top 2 box' + $sec2_q1_5,
xt=$sec2_q1_5,
dm $v_sec2_q1_6=$sec2_q1_6/1..2,$sec2_q1_6,
x='Top 2 box' + $sec2_q1_6,
xt=$sec2_q1_6,
t#15=$v_sec2_q1_1 * $gender,
t#16=$v_sec2_q1_2 * $gender,
t#17=$v_sec2_q1_3 * $gender,
t#18=$v_sec2_q1_4 * $gender,
t#19=$v_sec2_q1_5 * $gender,
t#20=$v_sec2_q1_6 * $gender,
dm $dum_sec2_q1(6),
h='
Quality of service;
Reliability;
Prices;
Staff;
Payment options;
Other products
',
t#21(f=nptc/nitb)=$sec2_q1_1 * $dum_sec2_q1,
vt='Section 2 Q1 Summary',
t#21=$sec2_q1_1 * 1,
t#21=$sec2_q1_2 * 2,
t#21=$sec2_q1_3 * 3,
t#21=$sec2_q1_4 * 4,
t#21=$sec2_q1_5 * 5,
t#21=$sec2_q1_6 * 6,
!1=Root variable name
!2=No of statements
!3=Data statement containing texts
!4=Banner
!5=1-Top 2 Box, 0-No top 2 box
!6=1-Summary table 0-No summary table
!7=Summary table title
t#22=$sec2_q2_1 * $age,
t#23=$sec2_q2_2 * $age,
t#24=$sec2_q2_3 * $age,
t#25=$sec2_q2_4 * $age,
finish tables,
